home *** CD-ROM | disk | FTP | other *** search
/ Java Developer's Companion / Java Developer's Companion.iso / documentation / tutorial / native1.1 / implementing / example-1.1 / createArray.c < prev    next >
Encoding:
C/C++ Source or Header  |  1997-07-13  |  1.6 KB  |  55 lines
  1. /*
  2.  * Copyright (c) 1995-1997 Sun Microsystems, Inc. All Rights Reserved.
  3.  *
  4.  * Permission to use, copy, modify, and distribute this software
  5.  * and its documentation for NON-COMMERCIAL purposes and without
  6.  * fee is hereby granted provided that this copyright notice
  7.  * appears in all copies. Please refer to the file "copyright.html"
  8.  * for further important copyright and licensing information.
  9.  *
  10.  * SUN MAKES NO REPRESENTATIONS OR WARRANTIES ABOUT THE SUITABILITY OF
  11.  * THE SOFTWARE, EITHER EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED
  12.  * TO THE IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A
  13.  * PARTICULAR PURPOSE, OR NON-INFRINGEMENT. SUN SHALL NOT BE LIABLE FOR
  14.  * ANY DAMAGES SUFFERED BY LICENSEE AS A RESULT OF USING, MODIFYING OR
  15.  * DISTRIBUTING THIS SOFTWARE OR ITS DERIVATIVES.
  16.  */
  17. #include <stdio.h>
  18. #include <string.h>
  19. #include <stdlib.h>
  20. #include "MyTest.h"
  21.  
  22. jarray Java_MyTest_createArray(JNIEnv *env, jobject obj, jarray myarray) {
  23.  
  24.     int j, val;
  25.     jsize sz, start, len;
  26.     jint* parr;
  27.     jarray newIntArray;
  28.     jint intBuf[10];
  29.  
  30. // constructs a new array that is the same size of the passed in array
  31.  
  32.     sz = (*env)->GetArrayLength(env, myarray);
  33.  
  34.     newIntArray = (*env)->NewIntArray(env, sz);
  35.  
  36.     //set new values for a region within the new array (elements 3:6)
  37.     start = 2;
  38.     len = 4;
  39.  
  40.     if (start > sz - 1 ) {
  41.       start = sz - 1;
  42.       len = 0;
  43.     }
  44.     if ( start + len - 1 > sz) {
  45.       len = sz - start -1;
  46.     }
  47.     (*env)->GetIntArrayRegion(env, newIntArray, start, len, &intBuf[0]);
  48.     for (j=0;j<len;j++) {
  49.       intBuf[j] = j+1;
  50.     }
  51.     (*env)->SetIntArrayRegion(env, newIntArray, start, len, &intBuf[0]);
  52.     
  53.     return(newIntArray);
  54. }
  55.